home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fuji Wa La Te I Ka - Hyakunin Isshu Karuta
/
KARUTA.bin
/
wins
/
dpokalv2.dir
/
00605_Script_ÉCÅ[ÅI
< prev
next >
Wrap
Text File
|
1995-11-10
|
947b
|
43 lines
global Plus
on IkariT T1,T2
set IkariT = [16, 16, 16]
-- preLoadCast 16 + Plus, 18 + Plus
repeat with i in IkariT
set the castNum of sprite 2 = i + Plus
updateStage
wait T1
end repeat
set the castNum of sprite 2 = 1 + Plus
updateStage
wait T2
-- unLoadCast 16 + Plus, 18 + Plus
end
on IkariH T1,T2
set IkariH = [56, 56, 56]
-- preLoadCast 56 + Plus, 58 + Plus
repeat with i in IkariH
set the castNum of sprite 2 = i + Plus
updateStage
wait T1
end repeat
set the castNum of sprite 2 = 41 + Plus
updateStage
wait T2
-- unLoadCast 56 + Plus, 58 + Plus
end
on IkariB T1,T2
set IkariB = [126, 126, 126]
-- preLoadCast 126 + Plus
repeat with i in IkariB
set the castNum of sprite 2 = i + Plus
updateStage
wait T1
end repeat
set the castNum of sprite 2 = 121 + Plus
updateStage
wait T2
-- unLoadCast 126 + Plus
end